complexkey is package{
  type foo of %t is nf or foo(%t);
  
  main() do {
    var K := hash{};
    
    K[foo(3)] := "aleph";
    assert K[foo(3)]="aleph"
    
    K[foo(4)] := "beta";
    assert K[foo(3)]="aleph"
    assert K[foo(4)]="beta"
    
    logMsg(info,"$K");
    
    K[foo(3)] := "garb";
    
    logMsg(info,"$K");
    assert K[foo(3)]="garb"
  }
}